home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 19 / CU Amiga Magazine's Super CD-ROM 19 (1998)(EMAP Images)(GB)[!][issue 1998-02].iso / CUCD / Programming / LEDA / source / src / graph / _g_inout.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-11-16  |  3.4 KB  |  174 lines
  1. /*******************************************************************************
  2. +
  3. +  LEDA  3.1c
  4. +
  5. +
  6. +  _g_inout.c
  7. +
  8. +
  9. +  Copyright (c) 1994  by  Max-Planck-Institut fuer Informatik
  10. +  Im Stadtwald, 6600 Saarbruecken, FRG     
  11. +  All rights reserved.
  12. + 
  13. *******************************************************************************/
  14.  
  15.  
  16.  
  17. #include <LEDA/graph.h>
  18. #include <LEDA/stream.h>
  19.  
  20.  
  21. //--------------------------------------------------------------------------
  22. // graph i/o
  23. //--------------------------------------------------------------------------
  24.  
  25.  
  26. void put_int(filebuf& fb, int n)
  27. { register char* A = (char*)&n;
  28.            char* E = A+4;
  29.  
  30.   while (A<E) fb.sputc(*(A++));
  31. }
  32.  
  33. int get_int(istream& from)
  34. { int n;
  35.   register char* A = (char*)&n;
  36.            char* E = A+4;
  37.   while (A<E) from.get(*(A++));
  38.   return n;
  39. }
  40.  
  41. void graph::write(string file_name) const
  42. { char* s = ~file_name;
  43.   file_ostream out(s);
  44.   if (out.fail()) error_handler(1,"write: cannot open file");
  45.   write(out);
  46. }
  47.  
  48.  
  49. void graph::write(ostream& out) const
  50. {
  51.   int* A = new int[max_n_index+2];
  52.  
  53.   // nodes get numbers from 1 to |V| (trouble with 0)
  54.  
  55.   int count = 1;
  56.  
  57.   out << "LEDA.GRAPH\n";
  58.   out << node_type() << "\n";
  59.   out << edge_type() << "\n";
  60.  
  61.   out << V.length() << "\n";
  62.  
  63.   node v;
  64.   forall_nodes(v,*this)
  65.   { write_node_entry(out,v->data[0]);
  66.     out << "\n";
  67.     A[v->name] = count++;
  68.    }
  69.  
  70.   out << E.length() << "\n";
  71.   edge e;
  72.   forall_edges(e,*this)
  73.   { out << A[e->s->name] << " " << A[e->t->name] << " ";
  74.     write_edge_entry(out,e->data[0]);
  75.     out << "\n";
  76.    }
  77. delete A;
  78. }
  79.  
  80. int graph::read(string file_name)
  81. { char* s = ~file_name;
  82.   file_istream in(s);
  83.   if (in.fail())  return 1;
  84.   return read(in);
  85. }
  86.  
  87. int graph::read(istream& in)
  88. { int result = 0;
  89.  
  90.   clear();
  91.  
  92.   edge e;
  93.   int n,i,v,w;
  94.  
  95.   string d_type,n_type,e_type;
  96.  
  97.   string this_n_type = node_type();
  98.   string this_e_type = edge_type();
  99.  
  100.   while (in && d_type=="") in >> d_type;
  101.  
  102.   in >> n_type >> e_type >> n;
  103.  
  104.   if (d_type != "LEDA.GRAPH") return 3;
  105.  
  106.   read_line(in);
  107.  
  108.   node* A = new node[n+1];
  109.  
  110.   if (n_type != this_n_type)
  111.   { if (this_n_type != "void") result = 2;   // incompatible node types
  112.     for (i=1; i<=n; i++)
  113.     { A[i] = new_node();
  114.       read_line(in);
  115.      }
  116.    }
  117.   else
  118.     for (i=1; i<=n; i++)
  119.     { A[i] = new_node(0);
  120.       read_node_entry(in,A[i]->data[0]);
  121.      }
  122.  
  123.   in >> n;       // number of edges
  124.  
  125.   if (e_type != this_e_type)
  126.   { if (this_e_type != "void") result = 2;   // incompatible edge types
  127.     while (n--) { in >> v >> w;
  128.                   e = new_edge(A[v],A[w]);
  129.                   read_line(in);
  130.                  }
  131.    }
  132.   else
  133.    while (n--) { in >> v >> w;
  134.                  e = new_edge(A[v],A[w],0);
  135.                  read_edge_entry(in,e->data[0]);
  136.                 }
  137.  
  138.   delete A;
  139.   return result;
  140. }
  141.  
  142.  
  143. void graph::print_node(node v,ostream& o) const
  144. { if (super() != 0)
  145.      super()->print_node(node(graph::inf(v)),o);
  146.   else
  147.      { o << "[" << index(v) <<"]" ;
  148.        print_node_entry(o,v->data[0]);
  149.       }
  150. }
  151.  
  152. void graph::print_edge(edge e,ostream& o) const
  153. { if (super() != 0)
  154.      super()->print_edge(edge(graph::inf(e)),o);
  155.   else
  156.      { o <<   "[" << e->s->name << "]--";
  157.        print_edge_entry(o,e->data[0]);
  158.        o << "-->[" << e->t->name << "]";
  159.       }
  160. }
  161.  
  162. void graph::print(string s, ostream& out) const
  163. { node v;
  164.   edge e;
  165.   out << s << endl;
  166.   forall_nodes(v,*this)
  167.   { print_node(v,out);
  168.     out << " : ";
  169.     forall_adj_edges(e,v) print_edge(e,out);
  170.     out << endl;
  171.    }
  172.   out << endl;
  173. }
  174.